object UretimAdetliTakipF: TUretimAdetliTakipF
  Left = 303
  Top = 106
  Width = 933
  Height = 574
  Caption = #220'retim Adetli Takip'
  Color = clBtnFace
  Font.Charset = TURKISH_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  OldCreateOrder = False
  Position = poDefaultPosOnly
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 14
  object Panel2: TPanel
    Left = 0
    Top = 0
    Width = 925
    Height = 111
    Align = alTop
    BevelOuter = bvNone
    Font.Charset = TURKISH_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 0
    object Label7: TLabel
      Left = 8
      Top = 36
      Width = 35
      Height = 14
      Caption = #304'lk Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label8: TLabel
      Left = 8
      Top = 60
      Width = 45
      Height = 14
      Caption = 'Son Tarih'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label3: TLabel
      Left = 8
      Top = 84
      Width = 34
      Height = 14
      Caption = 'Filitre 1'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label1: TLabel
      Left = 8
      Top = 14
      Width = 44
      Height = 14
      Caption = 'Tarihi Tipi'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object Label2: TLabel
      Left = 262
      Top = 83
      Width = 50
      Height = 14
      Caption = 'B'#246'l'#252'necek'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      Transparent = True
    end
    object t2: TwwDBDateTimePicker
      Left = 80
      Top = 55
      Width = 121
      Height = 22
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ShowButton = True
      TabOrder = 2
    end
    object t1: TwwDBDateTimePicker
      Left = 80
      Top = 31
      Width = 120
      Height = 22
      CalendarAttributes.Font.Charset = DEFAULT_CHARSET
      CalendarAttributes.Font.Color = clWindowText
      CalendarAttributes.Font.Height = -11
      CalendarAttributes.Font.Name = 'MS Sans Serif'
      CalendarAttributes.Font.Style = []
      Epoch = 1950
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      ShowButton = True
      TabOrder = 1
    end
    object TarihTipiK: TwwDBComboBox
      Left = 80
      Top = 8
      Width = 120
      Height = 22
      ShowButton = True
      Style = csDropDown
      MapList = True
      AllowClearKey = True
      AutoDropDown = True
      ShowMatchText = True
      DropDownCount = 8
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ItemHeight = 0
      Items.Strings = (
        'Montaj Da'#287#305't'#305'm'#9'tarih'
        'Montaj'#9'montajtarih'
        'Test'#9'testt'
        'Son Kontrol'#9'sontariht'
        'Paket'#9'paktar')
      ParentFont = False
      Sorted = False
      TabOrder = 0
      UnboundDataType = wwDefault
    end
    object lcTur: TwwDBLookupCombo
      Left = 80
      Top = 79
      Width = 137
      Height = 22
      Font.Charset = TURKISH_CHARSET
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      DisableThemes = False
      DropDownAlignment = taLeftJustify
      Selected.Strings = (
        'Baslik'#9'20'#9'Baslik'#9'F')
      LookupTable = adoTur
      LookupField = 'Ref'
      Style = csDropDownList
      Color = clWhite
      Navigator = False
      ParentFont = False
      TabOrder = 3
      AutoDropDown = True
      ShowButton = True
      UseTFields = False
      AllowClearKey = True
      ShowMatchText = True
    end
    object edBoluncek: TwwDBSpinEdit
      Left = 317
      Top = 79
      Width = 60
      Height = 22
      TabStop = False
      Increment = 1.000000000000000000
      MaxValue = 1000.000000000000000000
      MinValue = 1.000000000000000000
      Value = 6.000000000000000000
      TabOrder = 4
      UnboundDataType = wwDefault
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 515
    Width = 925
    Height = 32
    Align = alBottom
    BevelOuter = bvNone
    Font.Charset = TURKISH_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    DesignSize = (
      925
      32)
    object bYenile: TButton
      Left = 8
      Top = 4
      Width = 105
      Height = 25
      Caption = 'Yenile'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      OnClick = bYenileClick
    end
    object bkapat: TBitBtn
      Left = 844
      Top = 5
      Width = 75
      Height = 24
      Anchors = [akRight, akBottom]
      Caption = 'Kapat'
      Font.Charset = TURKISH_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 1
      OnClick = bkapatClick
    end
  end
  object PageControl1: TPageControl
    Left = 0
    Top = 111
    Width = 925
    Height = 404
    ActivePage = TabSheet1
    Align = alClient
    TabOrder = 1
    object TabSheet1: TTabSheet
      Caption = 'Tablo'
      object cxGrid1: TcxGrid
        Left = 0
        Top = 0
        Width = 917
        Height = 375
        Align = alClient
        TabOrder = 0
        LookAndFeel.NativeStyle = True
        object cxGrid1DBTableView1: TcxGridDBTableView
          NavigatorButtons.ConfirmDelete = False
          DataController.DataSource = UretimAdetliTakipQS
          DataController.Summary.DefaultGroupSummaryItems = <
            item
              Kind = skSum
              FieldName = 'Miktar'
              Column = cxGrid1DBTableView1miktar
              DisplayText = 'Miktar Toplam :'
            end
            item
              Kind = skSum
              FieldName = 'ToplamUretimDk'
              Column = cxGrid1DBTableView1ToplamUretimDk
              DisplayText = 'Toplam Dk : '
            end>
          DataController.Summary.FooterSummaryItems = <
            item
              Format = '#,0'
              Kind = skSum
              FieldName = 'miktar'
              Column = cxGrid1DBTableView1miktar
            end
            item
              Format = '#,0'
              Kind = skSum
              FieldName = 'ToplamUretimDk'
              Column = cxGrid1DBTableView1ToplamUretimDk
            end>
          DataController.Summary.SummaryGroups = <>
          OptionsData.CancelOnExit = False
          OptionsData.Deleting = False
          OptionsData.DeletingConfirmation = False
          OptionsData.Editing = False
          OptionsData.Inserting = False
          OptionsSelection.CellSelect = False
          OptionsView.Footer = True
          OptionsView.GroupFooters = gfAlwaysVisible
          OptionsView.Indicator = True
          Styles.StyleSheet = dm.tvssDevExpress
          object cxGrid1DBTableView1UretimNo: TcxGridDBColumn
            Caption = 'Emir No'
            DataBinding.FieldName = 'UretimNo'
            Width = 50
          end
          object cxGrid1DBTableView1UremriTarih: TcxGridDBColumn
            Caption = 'Emir Tarih'
            DataBinding.FieldName = 'UremriTarih'
            Width = 66
          end
          object cxGrid1DBTableView1stokkodu: TcxGridDBColumn
            Caption = 'Stok Kodu'
            DataBinding.FieldName = 'stokkodu'
            Width = 120
          end
          object cxGrid1DBTableView1Cinsi: TcxGridDBColumn
            DataBinding.FieldName = 'Cinsi'
            Width = 178
          end
          object cxGrid1DBTableView1miktar: TcxGridDBColumn
            Caption = 'Miktar'
            DataBinding.FieldName = 'miktar'
            Width = 49
          end
          object cxGrid1DBTableView1UstGrupId: TcxGridDBColumn
            Caption = #220'st Grup'
            DataBinding.FieldName = 'UstGrupId'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsUstGrup
            Width = 84
          end
          object cxGrid1DBTableView1GrupId: TcxGridDBColumn
            Caption = 'Grup'
            DataBinding.FieldName = 'GrupId'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsGrup
            Width = 111
          end
          object cxGrid1DBTableView1ModelId: TcxGridDBColumn
            Caption = 'Model'
            DataBinding.FieldName = 'ModelId'
            PropertiesClassName = 'TcxLookupComboBoxProperties'
            Properties.KeyFieldNames = 'id'
            Properties.ListColumns = <
              item
                FieldName = 'isim'
              end>
            Properties.ListSource = dm.dsModel
            Width = 98
          end
          object cxGrid1DBTableView1UretimSn: TcxGridDBColumn
            Caption = #220'retim(Sn)'
            DataBinding.FieldName = 'UretimSn'
            Width = 59
          end
          object cxGrid1DBTableView1ToplamUretimDk: TcxGridDBColumn
            Caption = 'Topl.'#220'rt.(Dk)'
            DataBinding.FieldName = 'ToplamUretimDk'
            PropertiesClassName = 'TcxCurrencyEditProperties'
            Properties.DisplayFormat = ',0.00;-,0.00'
          end
        end
        object cxGrid1Level1: TcxGridLevel
          GridView = cxGrid1DBTableView1
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = 'Pivot'
      ImageIndex = 1
      object PivotGrid1: TcxDBPivotGrid
        Left = 0
        Top = 0
        Width = 917
        Height = 375
        Align = alClient
        DataSource = UretimAdetliTakipQS
        Groups = <>
        TabOrder = 0
        object PivotGrid1UretimNo: TcxDBPivotGridField
          AreaIndex = 0
          IsCaptionAssigned = True
          Caption = 'Emir No'
          DataBinding.FieldName = 'UretimNo'
          Visible = True
        end
        object PivotGrid1UremriTarih: TcxDBPivotGridField
          AreaIndex = 1
          IsCaptionAssigned = True
          Caption = 'Emir Tarih'
          DataBinding.FieldName = 'UremriTarih'
          Visible = True
        end
        object PivotGrid1Stokkodu: TcxDBPivotGridField
          AreaIndex = 2
          DataBinding.FieldName = 'Stokkodu'
          Visible = True
        end
        object PivotGrid1Cinsi: TcxDBPivotGridField
          AreaIndex = 3
          DataBinding.FieldName = 'Cinsi'
          Visible = True
        end
        object PivotGrid1UstGrupId: TcxDBPivotGridField
          AreaIndex = 4
          IsCaptionAssigned = True
          Caption = #220'st Grup'
          DataBinding.FieldName = 'UstGrupId'
          Visible = True
        end
        object PivotGrid1GrupId: TcxDBPivotGridField
          AreaIndex = 5
          IsCaptionAssigned = True
          Caption = 'Grup'
          DataBinding.FieldName = 'GrupId'
          Visible = True
        end
        object PivotGrid1ModelId: TcxDBPivotGridField
          Area = faRow
          AreaIndex = 0
          IsCaptionAssigned = True
          Caption = 'Model'
          DataBinding.FieldName = 'ModelId'
          Visible = True
        end
        object PivotGrid1Miktar: TcxDBPivotGridField
          Area = faData
          AreaIndex = 0
          DataBinding.FieldName = 'Miktar'
          Visible = True
        end
        object PivotGrid1UretimSn: TcxDBPivotGridField
          AreaIndex = 6
          IsCaptionAssigned = True
          Caption = #220'retim(Sn)'
          DataBinding.FieldName = 'UretimSn'
          Visible = True
        end
        object PivotGrid1ToplamUretimDk: TcxDBPivotGridField
          Area = faData
          AreaIndex = 1
          IsCaptionAssigned = True
          Caption = 'Topl.'#220'rt.(Dk)'
          DataBinding.FieldName = 'ToplamUretimDk'
          Visible = True
        end
      end
    end
  end
  object UretimAdetliTakipQ: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      
        'select uretim.UretimNo,UremriTarih=UrEmri.Tarih,Stok.Stokkodu,St' +
        'ok.Cinsi,Stok.UstGrupId,'
      'Stok.GrupId,Stok.ModelId,Miktar=Count(*) '
      'from uretim '
      ' join Stok on (Uretim.UretimKod=Stok.Stokkod)'
      'join UrEmri on (UrEmri.Emirno=uretim.UretimNo)'
      'where uretim.tarih>='#39'01.07.2011 '#39' and uretim.tarih<'#39'02.07.2011'#39
      'group by uretim.UretimNo,UrEmri.Tarih,Stok.Stokkodu,Stok.Cinsi,'
      'Stok.UstGrupId,Stok.GrupId,Stok.ModelId order by uretim.UretimNo')
    Left = 384
    Top = 20
  end
  object UretimAdetliTakipQS: TDataSource
    DataSet = UretimAdetliTakipQ
    Left = 352
    Top = 20
  end
  object adoTur: TADOQuery
    Connection = dm.connect
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select * from TblSiparisTur order by sira')
    Left = 386
    Top = 71
  end
end
